home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 34.zip / BS1 part 34 / GFA basic training.adf / Erweiterung / SCROLL_V.GFA (.txt) < prev    next >
GFA-BASIC Amiga  |  1989-06-01  |  2KB  |  36 lines
  1. GFA-AMIGAB
  2. R_ADR
  3. TEXTPOS
  4. LAEUFE
  5. ZEILE
  6. MAX_LAUF    PIX_ZEILE
  7. LAENGE
  8. LOOPS
  9.     SCROLL_IT
  10. Scrolling
  11. Mit Graphics-Library
  12. Fe     Ein Window braucht nicht ge
  13. ffnet zu werden
  14. Rastportadresse des Ausgabe-Screens:
  15. Wieviele Durchl
  16. ufe ?
  17. Auszugebender Text
  18.  GFA-Basic pr
  19. sentiert: einen Test-String zum Scrollen von Texten im Screen ohne Window !!! Ist Alles Ready f
  20. r mehr Text? Aber klar!!!!!              F
  21. In welcher Zeile soll der Text geschrieben und gerollt werden, in Pixeln:
  22. Aufruf der Scrollroutine:
  23. Abschalten:
  24. nge des Textes:
  25. Rastport setzen
  26. Adresse des Textes
  27.  gesamten Text scrollen und schreiben
  28. Grafikstift immer wieder auf gleiche Position setzen:
  29. Und an diese Stelle schreiben
  30.  Abstand zwischen den Einzelnen Buchstaben- Anfangspixeln (2*6 Pixel)
  31. Warten auf den Beginn des Bildschirmaufbaus
  32. Die Bildschirmzeilen, in denen der Text steht, in ganzer
  33. Breite um 6 Pixel scrollen:
  34.  Alle Durchl
  35. ufe erledigt
  36.